home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 3 / Cream of the Crop 3.iso / bbs / ms_ad11.zip / XLHA2LHA < prev   
AmigaDOS Script File  |  1993-12-14  |  934b  |  41 lines
  1. .KEY NEWN,PATHF,FN
  2. .BRA {
  3. .KET }
  4.  
  5. failat 21
  6. changetaskpri -1
  7.  
  8. ;make RAM the current directory
  9. CD RAM:
  10.  
  11. ;create the directory {FN} in RAM:, CD there and delete anything that might already exist there
  12. makedir {FN}
  13. cd {FN}/
  14. delete #?
  15. lha -a -m -M -p -x -X x "{PATHF}"
  16.  
  17. ;Incase files are protected
  18. protect #? +rwed all
  19.  
  20. ; Delete unwanted text!
  21. delete ZZ#? #?foo #?displayme lztext BBS.txt
  22.  
  23. ;DELETE ORIGINAL UD FILE!
  24. delete "{PATHF}"
  25.  
  26. ;re-compress file
  27. lha -m -x -a -r -X -y -2 a "{PATHF}" #?
  28. cd TX:
  29.  
  30. ;remove the temporary directory and it's files
  31. delete {FN} ALL
  32.  
  33. ;add our description text if existent
  34. ;Another script (or this one) should already have been used to copy the .sdn
  35. ;textfile to the same directory that the file {FN} is in.
  36. AddDescript DEV UDBase0: EXT .sdn {NEWN}
  37.  
  38. ;Look for and add FILE_ID.DIZ to the short or long desciption
  39. ;MUST BE RUNBACK'd!! -> See AddDescript docs.
  40. runback pfiles:AddDescript DEV UDBase0: DIZ {NEWN}
  41.